home *** CD-ROM | disk | FTP | other *** search
/ Aminet 21 / Aminet 21 (1997)(GTI - Schatztruhe)[!][Oct 1997].iso / Aminet / gfx / show / SViewNG.lha / SViewNG_EL.lha / SViewNG / Install_SViewNG < prev    next >
Text File  |  1997-08-20  |  6KB  |  153 lines
  1. ; $VER: Install_SViewNG.script V7.17 (8.8.97)
  2. ; © 1993-97 by Andreas R. Kleinert.
  3. ; Italian strings by Alessandro Basso (cralex@amiga.dei.unipd.it)
  4. ; Norwegian strings by Roger Hågensen (msi@sn.no)
  5.  
  6.  
  7. (set @app-name "SViewNG")
  8. (welcome "SViewNG Installation")
  9.  
  10.  
  11. ; *** english is default language
  12.  
  13.     (set #Msg_wrong_OS       (cat "You need at least AmigaOS V2.04 to run SViewNG !\n\n"
  14.                                   "SViewNG will not run with your system configuration !"))
  15.     (set #Msg_InstallingSViewNG "Installing SViewNG now. Libraries have to be installed separately !")
  16.     (set #Msg_SelectPath          "Select path to install SViewNG to\n(Work:SViewNG/)")
  17.     (set #Msg_InstallingCatalogs  "Installing Catalog-Files for OS V2.1+\nCode localization.")
  18.     (set #Msg_SelectCatalogPath   "Select path to install Catalogs to")
  19.     (set #Msg_SViewNGPath       "Now modifying your S:User-Startup for a search path...")
  20.     (set #Msg_CopyPalette         "Copy SViewNGPalette to SYS:WBStartup ?\n(Not with MagicWB, etc.)")
  21.     (set #Msg_RunLibInstaller     "Now install Library ?")
  22.     (set #Msg_DoInstallSViewNG  "SViewNG has been installed.")
  23.  
  24.  
  25. (if (= @language "deutsch")
  26.   (
  27.     (set #Msg_wrong_OS       (cat "Sie benötigen mindestens AmigaOS V2.04 für SViewNG !\n\n"
  28.                                   "SViewNG wird auf Ihrem System nicht laufen !"))
  29.     (set #Msg_InstallingSViewNG "Installiere jetzt SViewNG. Die Libraries müssen separat installiert werden !")
  30.     (set #Msg_SelectPath          "Wählen Sie das Zielverzeichnis für SViewNG\n(Work:SViewNG/)")
  31.     (set #Msg_InstallingCatalogs  "Installiere jetzt die Katalog-Dateien für die\nOS V2.1+ Sprach-Unterstützung.")
  32.     (set #Msg_SelectCatalogPath   "Wählen Sie den Pfad für die Katalog-Dateien")
  33.     (set #Msg_SViewNGPath       "Modifiziere jetzt S:User-Startup für einen Suchpfad...")
  34.     (set #Msg_CopyPalette         "SViewNGPalette nach SYS:WBStartup kopieren ?\n(Nicht mit MagicWB, etc.)")
  35.     (set #Msg_RunLibInstaller     "Jetzt Library installieren ?")
  36.     (set #Msg_DoInstallSViewNG  "SViewNG wurde installiert.")
  37.   )
  38. )
  39.  
  40. (if (= @language "italiano")
  41.   (
  42.     (set #Msg_wrong_OS       (cat "Ti serve almeno AmigaOS V2.04 per usare SViewNG !\n\n"
  43.                                   "SViewNG non funzionerà con la tua configurazione di sistema !"))
  44.     (set #Msg_InstallingSViewNG "Ora installo SViewNG. Le Librerie dovranno essere installate separatamente !")
  45.     (set #Msg_SelectPath          "Seleziona il percorso dove installare SViewNG\n(Work:SViewNG/)")
  46.     (set #Msg_InstallingCatalogs  "Installo File-Catalogo per OS V2.1+\nLocalizzazione del Codice.")
  47.     (set #Msg_SelectCatalogPath   "Seleziona percorso in cui installare i Cataloghi")
  48.     (set #Msg_SViewNGPath       "Ora modifico la tua S:User-Startup per il percorso di ricerca...")
  49.     (set #Msg_CopyPalette         "Copio SViewNGPalette in SYS:WBStartUp ?\n(Non con MagicWB, ecc.)")
  50.     (set #Msg_RunLibInstaller     "Installo ora le Librerie ?")
  51.     (set #Msg_DoInstallSViewNG  "SViewNG è stato installato.")
  52.   )
  53. )
  54.  
  55. (if (= @language "norsk")
  56.   (
  57.     (set #Msg_wrong_OS       (cat "Du trenger minst AmigaOS V2.04 for å bruke SViewNG !\n\n"
  58.                                   "SViewNG vil ikke kjører på ditt system oppsett !"))
  59.     (set #Msg_InstallingSViewNG "Installerer SViewNG nå. Bibliotek må installeres separat !")
  60.     (set #Msg_SelectPath          "Velg destinasjon hvor SViewNG skal inastalleres\n(Work:SViewNG/)")
  61.     (set #Msg_InstallingCatalogs  "Installerer Katalog-Filer for OS V2.1+\nKode lokalisering.")
  62.     (set #Msg_SelectCatalogPath   "Velg destinatsjon hvor Kataloger skal installeres")
  63.     (set #Msg_SViewNGPath       "Modifiserer nå din S:User-Startup for en søke sti...")
  64.     (set #Msg_CopyPalette         "Kopier SViewNGPalette til SYS:WBStartup ?\n(Ikke med MagicWB, osv.)")
  65.     (set #Msg_RunLibInstaller     "Installer Bibliotek ?")
  66.     (set #Msg_DoInstallSViewNG  "SViewNG er nå installert.")
  67.   )
  68. )
  69.  
  70. (set #OS_VER (/ (getversion) 65536) )
  71.  
  72. (if(< #OS_VER 37)
  73.   (abort #Msg_wrong_OS)
  74. )
  75.  
  76. (complete 0)
  77.  
  78. (makedir "ENV:SuperView-Library")
  79. (makedir "ENVARC:SuperView-Library")
  80.  
  81. (if (exists "ENVARC:SuperView-Library/SV_WHERE") (set #svcomdir (getenv "SuperView-Library/SV_WHERE"))
  82.  
  83.  (set #svcomdir "Work:SViewNG")
  84. )
  85.  
  86. (if (= (exists (#svcomdir)) 0) (set #svcomdir "Work:SViewNG") )
  87.  
  88. (set #svcomdir
  89.             (askdir
  90.                    (prompt #Msg_SelectPath)
  91.                    (help @askdir-help)
  92.                    (newpath)
  93.                    (default #svcomdir)
  94.             )
  95. )
  96.  
  97. (delete "ENVARC:SuperView-Library/SV_WHERE")
  98. (delete "ENV:SuperView-Library/SV_WHERE")
  99. (textfile (dest "ENVARC:SuperView-Library/SV_WHERE") (append #svcomdir) (safe))
  100. (textfile (dest "ENV:SuperView-Library/SV_WHERE") (append #svcomdir) (safe))
  101.  
  102. (copyfiles
  103.   (prompt #Msg_Installing)
  104.   (help @copyfiles-help)
  105.   (source "")
  106.   (dest #svcomdir)
  107.   (all)
  108.   (confirm)
  109. )
  110.  
  111. (complete 70)
  112.  
  113. (copyfiles
  114.   (prompt #Msg_InstallingCatalogs)
  115.   (help @copyfiles-help)
  116.   (source "locale/catalogs")
  117.   (set #svcatdir
  118.               (askdir
  119.                      (prompt #Msg_SelectCatalogPath)
  120.                      (help @askdir-help)
  121.                      (newpath)
  122.                      (default "SYS:locale/Catalogs")
  123.               )
  124.   )
  125.   (dest #svcatdir)
  126.   (all)
  127.   (confirm)
  128. )
  129.  
  130. (copyfiles
  131.   (prompt #Msg_CopyPalette)
  132.   (help @copyfiles-help)
  133.   (source "Tools")
  134.   (dest "SYS:WBStartup")
  135.   (pattern "SuperViewPalette#?")
  136.   (confirm)
  137. )
  138.  
  139. (startup "SViewNG"
  140.   (prompt #Msg_SViewNGPath)
  141.   (help @startup-help)
  142.   (command "Path "#svcomdir" ADD\n")
  143. )
  144.  
  145. (makeassign "IPROGDIR" "PROGDIR:" (safe))
  146. (set @execute-dir "SuperViewLibrary")
  147. (run (safe) "IPROGDIR:Installer Install_SVLib")
  148. (makeassign "IPROGDIR" "" (safe))
  149.  
  150. (complete 99)
  151.  
  152. (exit #Msg_DoInstallSViewNG)
  153.